;;;QQ:67762207
[@AreaQuest9Mon1]
{
#IF
check [109] 1
check [110] 0
check [199] 1
#ACT
goto @AreaQuest9Mon1_1
break
#ELSEACT
break

[@AreaQuest9Mon1_1]
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSQL "TBL_BasicCharQuest" %A9 "FLD_Char,FLD_STATUS1,FLD_STATUS1_RDY,FLD_MAKEIDX" [@AreaQuest9Mon1Read]

[@AreaQuest9Mon1Read()]
#IF
#ACT
Mov A0 %ARG(1)
Mov D0 %ARG(2)
Mov D1 %ARG(3)

#IF
Equal A0 %USERNAME
Equal D0 28
Equal D1 3
#ACT
goto @AreaQuest9Mon1_3
break

#IF
Equal A0 %USERNAME
Equal D0 28
Equal D1 4
#ACT
goto @AreaQuest9_True
break

#IF
Equal A0 %USERNAME
Equal D0 28
Equal D1 14
#ACT
goto @AreaQuest9Mon1_14
break
#ELSEACT
break

[@AreaQuest9Mon1_14]
#IF
Random 2
#SAY
_(Ȼҵˣȥʧ԰ɡ) \\
_<  /@exit>
#ACT
give 鼮 1
FormatSTR "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=15"
set [199] 0
#ELSEACT
break

[@AreaQuest9Mon1_3]
#IF
CheckPos D711 228 191 20
#ACT
goto @AreaQuest9_True
break
#ELSEACT
goto @AreaQuest9_False

[@AreaQuest9_True]
#IF
checkitem Ұ 30
#ACT
Delaygoto [Local] 7 @AreaQuest9_MapMove
break
#SAY
_ЩһĺҰ...ʲôо? ͻȻ....\\
_<  /@exit>

#IF
checkitem Ұ 29
#ACT
give Ұ 1
FormatSTR "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=4"
break
#SAY
_ҰռĲٰؿԽʿ֤˿˰? \\
_<  /@exit>
#ELSEACT
give Ұ 1

[@AreaQuest9_False]
#IF
checkitem Ұ 30
#ACT
break

#IF
checkitem Ұ 29
#ACT
give Ұ 1
break
#SAY
_ҰռĲٰؿԽʿ֤˿˰?  \\
_<  /@exit>
#ELSEACT
give Ұ 1

[@AreaQuest9_MapMove]
#IF
#ACT
set [199] 0
FormatSTR "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=5"
MapMove DQ701_001 18 30
}

[@AreaQuest9Mon2]
{
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSQL "TBL_BasicCharQuest" %A9 "FLD_Char,FLD_STATUS1,FLD_STATUS1_RDY,FLD_MAKEIDX" [@AreaQuest9Mon2Read]

[@AreaQuest9Mon2Read()]
#IF
#ACT
Mov A0 %ARG(1)
Mov D0 %ARG(2)
Mov D1 %ARG(3)

#IF
Equal A0 %USERNAME
Equal D0 28
Equal D1 8
#ACT
goto @AreaQuest9Mon2_1
break
#ELSEACT
break

[@AreaQuest9Mon2_1]
#IF
Equal S2 29
#ACT
Mov S2 0
FormatSTR "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=9"
#SAY
_...ħˣҪ֧Ԯʱˣʯɡ\\
_<  /@exit>
#ELSEACT
Inc S2 1

}

[@AreaQuest9Mon3]
{
#IF
#ACT
FormatSTR "FLD_CHAR='%s'" %USERNAME
ReadValueSQL "TBL_BasicCharQuest" %A9 "FLD_Char,FLD_STATUS1,FLD_STATUS1_RDY,FLD_MAKEIDX" [@AreaQuest9Mon3Read]

[@AreaQuest9Mon3Read()]
#IF
#ACT
Mov A0 %ARG(1)
Mov D0 %ARG(2)
Mov D1 %ARG(3)

#IF
Equal A0 %USERNAME
Equal D0 28
Equal D1 10
#SAY
_(źŷ˰ˡ)\
_ƶ?\\
_<ƶ/@AreaQuest9_MapMove>
#ACT
;;MongenP "D712,106,267,0" ʯ 1
break

#IF
Equal A0 %USERNAME
Equal D0 28
Equal D1 9
#SAY
_(Ѿ˷ź.)\
_Ƿƶ?\\
_<ƶ./@AreaQuest9_MapMove>
#ACT
;;MongenP "D712,106,267,0" ʯ 1
#ELSEACT
;;MongenP "D712,106,267,0" ʯ 1

[@AreaQuest9_MapMove]
#IF
CheckHum DQ702_001 1
#SAY
_(ڻܽȥһ԰ɡ)\\
_<  /@exit>
#ACT
break

#ELSEACT
FormatSTR "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=10"
MapMove DQ702_001 18 27
goto @AreaQuest9_Event
break

[@AreaQuest9_Event]
#IF
#ACT
monclear "DQ702_001"
MongenP "DQ702_001,25,25,20" Ұ 25
MongenP "DQ702_001,25,20" Ұ 15
MongenP "DQ702_001,25,20" ʿ 3
MongenP "DQ702_001,25,20" սʿ 30
ApplyMonEX "DQ702_001,25,25,25" ʿ [HumanSide]
ApplyMonEX "DQ702_001,25,25,25" սʿ [HumanSide]
Delaygoto [Local] 60 @Area9_EventBonus

[@Area9_EventBonus]
#IF
CheckHum DQ702_001 1
!checkmonmap "DQ702_001" 1 Ұ
#ACT
MongenP "DQ702_001,25,25,20" Ұ 20
MongenP "DQ702_001,25,20" Ұ 15
Delaygoto [Local] 120 @Area9_EventBonus
}

[@AreaQuest9Mon4]
{
#IF
!checkmonmap "DQ702_001" 1 Ұ
#SAY
_(Ϊ˵֧ԮܿͽˡԱ㱨ɡ)\\
_<  /@exit>
#ACT
Delaygoto [Local] 5 @Area9_Mon4_Mapting
FormatSTR "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=11"
set [199] 0

[@Area9_Mon4_Mapting]
#IF
#ACT
Map 9
}

[@AreaQuest9Mon5]
{
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSQL "TBL_BasicCharQuest" %A9 "FLD_Char,FLD_STATUS1,FLD_STATUS1_RDY,FLD_MAKEIDX" [@AreaQuest9Mon5Read]

[@AreaQuest9Mon5Read()]
#IF
#ACT
Mov A0 %ARG(1)
Mov D0 %ARG(2)
Mov D1 %ARG(3)

#IF
Equal A0 %USERNAME
Equal D0 28
Equal D1 17
#ACT
goto @AreaQuest9Mon5_A
break

#IF
Equal A0 %USERNAME
Equal D0 28
Equal D1 18
#ACT
goto @AreaQuest9Mon5_B
break

#IF
Equal A0 %USERNAME
Equal D0 28
Equal D1 19
#ACT
goto @AreaQuest9Mon5_C
break

#IF
Equal A0 %USERNAME
Equal D0 28
Equal D1 20
#ACT
goto @AreaQuest9Mon5_D
break

#IF
Equal A0 %USERNAME
Equal D0 28
Equal D1 21
#ACT
goto @AreaQuest9Mon5_E
break
#ELSEACT
break

[@AreaQuest9Mon5_A]
#IF
#SAY
_(ץ˵һҰ˾) \\
_<  /@exit>
#ACT
Inc S2 1
FormatSTR "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=18"
break

[@AreaQuest9Mon5_B]
#IF
#SAY
_(ץ˵ڶҰ˾Ͱ˰һر𣬺п˵ĵڶ)\\
_<  /@exit>
#ACT
give  1
Inc S2 1
FormatSTR "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=19"
break

[@AreaQuest9Mon5_C]
#IF
#SAY
_(ץ˵Ұ˾) \\
_<  /@exit>
#ACT
Inc S2 1
FormatSTR "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=20"
break

[@AreaQuest9Mon5_D]
#IF
#SAY
_(ץ˵ĸҰ˾) \\
_<  /@exit>
#ACT
Inc S2 1
FormatSTR "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=21"
break

[@AreaQuest9Mon5_E]
#IF
#SAY
_(ץ˵Ұ˾õʯħ... \\
ʿ㱨ɡ)\\
_<  /@exit>
#ACT
give  1
Inc S2 1
set [199] 0
FormatSTR "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=22"
break

}

[@AreaQuest9Mon6]
{
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSQL "TBL_BasicCharQuest" %A9 "FLD_Char,FLD_STATUS1,FLD_STATUS1_RDY,FLD_MAKEIDX" [@AreaQuest9Mon6Read]

[@AreaQuest9Mon6Read()]
#IF
#ACT
Mov A0 %ARG(1)
Mov D0 %ARG(2)
Mov D1 %ARG(3)

#IF
Equal A0 %USERNAME
Equal D0 28
Equal D1 24
#ACT
goto @AreaQuest9Mon6_1
break

#ELSEACT
break

[@AreaQuest9Mon6_1]
#IF
checkitem ƻ 1
checkitem  1
checkitem  1
#SAY
_(ѵǳҰ{FCOLOR/10}{FCOLOR/12}ʯħоˣԱɡ)\\
_<  /@exit>
#ACT
take ƻ 1
take  1
take  1
give ֮ 1
set [199] 0
FormatSTR "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=25"
#ELSEACT
break

}
;;;QQ:67762207
